﻿Public Class frmHoaDon

    Private Sub btnThoatHD_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnThoatHD.ItemClick
        Close()
    End Sub

    Private Sub frmHoaDon_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        lbNgayLapHoaDon.Text = Date.Now.Date.ToShortDateString
    End Sub
End Class